home *** CD-ROM | disk | FTP | other *** search
/ ADA Programming Guide / ADA Programming Guide.iso / ada_tut / fib.dum < prev    next >
Text File  |  1996-01-30  |  144b  |  7 lines

  1. -- Dummy solution to Outside Assignment 4
  2. separate (Fibtest)
  3. function Fib(N : in Positive) return Positive is
  4. begin
  5.    return 4;
  6. end Fib;
  7.